//========================================================================
//  SE5 Empire Setup - Abbidon - Captain Kwok's Balance Mod v125+
//========================================================================
//
// Abbidon Enclave
// Carbon Dioxide + Gas Giant, Anarchy, Artisans
//

#include Script_AI_GlobalResearch.txt

//------------------------------------------------------------------------
// Global Constants
//------------------------------------------------------------------------

//------------------------------------------------------------------------
// Global Variables
//------------------------------------------------------------------------

//------------------------------------------------------------------------
// Forward Declarations
//------------------------------------------------------------------------

//------------------------------------------------------------------------
// Main
//------------------------------------------------------------------------
function Main returns boolean
vars
  racial_pts:                long
  research_pts:              long
begin

  // Get our racial trait and starting research points
  set racial_pts := Sys_AI_Setup_Get_Racial_Points_Remaining(sys_long_Player_ID)
  set research_pts := Sys_AI_Setup_Get_Research_Points_Remaining(sys_long_Player_ID)

  // Abbidon setup preferences
  set bool_Race_Uses_Mines                                 := TRUE
  set bool_Race_Uses_Fighters                              := TRUE
  set bool_Race_Uses_Satellites                            := FALSE
  set bool_Race_Uses_Troops                                := TRUE
  set bool_Race_Uses_Weapon_Platforms                      := TRUE
  set bool_Race_Uses_Drones                                := TRUE
  set bool_Race_Uses_Kamikaze_Ships                        := FALSE
  set bool_Race_Uses_Boarding_Ships                        := FALSE
  set bool_Race_Uses_Bombardment_Ships                     := FALSE
  set bool_Race_Uses_Normal_Armor                          := TRUE
  set bool_Race_Uses_Normal_Shields                        := TRUE
  set bool_Race_Uses_Cloaking_Devices                      := FALSE
  set bool_Race_Uses_Master_Computers                      := FALSE

  set bool_Race_Uses_Psychic_Tech                          := TRUE
  set bool_Race_Uses_Psychic_Weapons                       := TRUE

  set bool_Race_Uses_Plasma_Missile_Weapons                := TRUE

  // Abbidon Racial Traits
  call Sys_Debug_Print("Setup", "------------------------")
  call Sys_Debug_Print("Setup", "Racial Trait Selections:")
  call Sys_Debug_Print("Setup", "  - Starting Points = " + Sys_Convert_Long_To_String(racial_pts))

  // AI Assist
  if Sys_Are_We_Computer_Player(sys_long_Player_ID) then
    call Add_Racial_Trait("AI Assist") // 0
  endif

  // 2,000 Pts
  call Add_Racial_Trait("Psychic") // 1,000
  call Add_Racial_Trait("Low Reproduction") // -500
  call Add_Racial_Trait("Foolish")  // -500
  call Add_Racial_Trait("Physical Weakness") // -500
  call Add_Racial_Trait("Cowardly") // -500
  call Add_Racial_Trait("Advanced Storage Techniques") // 2,000
  call Add_Racial_Trait("Propulsion Experts") // 1,000
  // 3,000 Pts
  call Add_Racial_Trait("Naturally Happy") // 500
  call Add_Racial_Trait("Lucky") // 500
  // 5,000 Pts
  call Add_Racial_Trait("Advanced Power Conservation") // 1,000
  call Add_Racial_Trait("Natural Merchants") // 1,000

  // Abbidon starting tech selections
  call Sys_Debug_Print("Setup", "----------------------")
  call Sys_Debug_Print("Setup", "Technology Selections:")
  call Sys_Debug_Print("Setup", "  - Starting Points = " + Sys_Convert_Long_To_String(research_pts))

  // Abbidon low tech start (5,000 Default)
  if (research_pts > 0) and (research_pts <= 5000) then
    call Add_Tech_area("Sensors", 3, TRUE, FALSE) // 5,000
  endif

  // Abbidon medium tech start (50,000 Default; 25,000 = High Cost, 100,000 = Low Cost)
  if (research_pts > 5000) and (research_pts <= 100000) then
    call Add_Tech_Area("Physics", 2, TRUE, FALSE) // 12,000
    // Sub-Total 12,000 (12,000)
    call Add_Tech_Area("Armor", 2, TRUE, FALSE) // 2,000
    call Add_Tech_Area("Shields", 1, TRUE, FALSE) // 2,000
    call Add_Tech_Area("Sensors", 4, TRUE, FALSE) // 9,000
    // Sub-Total 13,000 (25,000)
    call Add_Tech_Area("Small Ship Construction", 3, TRUE, FALSE) // 10,000
    call Add_Tech_Area("Stellar Harnessing", 1, TRUE, FALSE) // 2,000
    call Add_Tech_Area("Medical Treatment", 1, TRUE, FALSE) // 2,000
    // Sub-Total 14,000 (39,000)
    call Add_Tech_Area("Psychic Weapons", 2, bool_Race_Uses_Psychic_Weapons, FALSE) // 6,000
    call Add_Tech_Area("Point-Defense Weapons", 2, TRUE, FALSE) // 4,000
    call Add_Tech_Area("Troop Weapons", 2, TRUE, FALSE) // 1,000
    // Sub-Total 11,000 (50,000)
    call Add_Tech_Area("Psychic Technology", 2, bool_Race_Uses_Psychic_Tech, FALSE) // 4,000
    // Sub-Total 4,000 (54,000)
    call Add_Tech_Area("Military Science", 2, TRUE, FALSE) // 10,000
    // Sub-Total 14,000 (64,000)
    call Add_Tech_Area("Ion Engines", 3, TRUE, FALSE) // 10,000
    call Add_Tech_Area("Contra-Terrene Engines", 1, TRUE, FALSE) // 4,000
    call Add_Tech_Area("Resupply", 2, TRUE, FALSE) // 2,000
    call Add_Tech_Area("Defense Systems", 2, TRUE, FALSE) // 6,000
    call Add_Tech_Area("Cargo", 2, TRUE, FALSE) // 2,000
    call Add_Tech_Area("Applied Research", 2, TRUE, FALSE) // 12,000
    // Sub-Total 36,000 (100,000)
  endif

  // Abbidon high tech start (500,000 Default; 250,000 = High Cost; 1,000,000 = Low Cost)
  if (research_pts > 100000) then
    call Add_Tech_Area("Rock Planet Colonization", 1, TRUE, FALSE) // 50,000
    call Add_Tech_Area("Ice Planet Colonization", 1, TRUE, FALSE) // 50,000
    // Sub-Total 100,000 (100,000)
    call Add_Tech_Area("Psychic Technology", 2, bool_Race_Uses_Psychic_Tech, FALSE) // 4,000
    call Add_Tech_Area("Psychic Weapons", 3, bool_Race_Uses_Psychic_Weapons, FALSE) // 15,000
    // Sub-Total 19,000 (119,000)
    call Add_Tech_Area("Construction", 2, TRUE, FALSE) // 12,000
    call Add_Tech_Area("Military Science", 2, TRUE, FALSE) // 10,000
    call Add_Tech_Area("Physics", 2, TRUE, FALSE) // 12,000
    // Sub-Total 34,000 (153,000)
    call Add_Tech_Area("Repair", 1, TRUE, FALSE) // 1,000
    call Add_Tech_Area("Small Ship Construction", 6, TRUE, FALSE) // 40,000
    call Add_Tech_Area("Medium Ship Construction", 1, TRUE, FALSE) // 6,000
    call Add_Tech_Area("Mines", 1, TRUE, FALSE) // 4,000
    call Add_Tech_Area("Stellar Harnessing", 1, TRUE, FALSE) // 2,000
    call Add_Tech_Area("Armor", 3, TRUE, FALSE) // 5,000
    call Add_Tech_Area("Shields", 3, TRUE, FALSE) // 12,000
    call Add_Tech_Area("Sensors", 4, TRUE, FALSE) // 9,000
    call Add_Tech_Area("Defense Systems", 3, TRUE, FALSE) // 12,000
    // Sub-Total 91,000 (244,000)
    call Add_Tech_Area("Point-Defense Weapons", 2, TRUE, FALSE) // 4,000
    call Add_Tech_Area("Warheads", 2, TRUE, FALSE) // 2,000
    // Sub-Total 6,000 (250,000)
    call Add_Tech_Area("Psychic Technology", 3, bool_Race_Uses_Psychic_Tech, FALSE) // 6,000
    call Add_Tech_Area("Psychic Weapons", 5, bool_Race_Uses_Psychic_Weapons, FALSE) // 27,000
    // Sub-Total 33,000 (283,000)
    call Add_Tech_Area("Chemistry", 2, TRUE, FALSE) // 12,000
    call Add_Tech_Area("Construction", 3, TRUE, FALSE) // 18,000
    call Add_Tech_Area("Psychology", 1, TRUE, FALSE) // 3,000
    // Sub-Total 33,000 (316,000)
    call Add_Tech_Area("Space Yards", 3, TRUE, FALSE) // 20,000
    call Add_Tech_Area("Troops", 4, TRUE, FALSE) // 9,000
    call Add_Tech_Area("Fighters", 3, TRUE, FALSE) // 25,000
    call Add_Tech_Area("Ion Engines", 3, TRUE, FALSE) // 10,000
    call Add_Tech_Area("Contra-Terrene Engines", 1, TRUE, FALSE) // 4,000
    call Add_Tech_Area("Resupply", 3, TRUE, FALSE) // 5,000
    call Add_Tech_Area("Cargo", 3, TRUE, FALSE) // 5,000
    call Add_Tech_Area("Applied Research", 3, TRUE, FALSE) // 30,000
    call Add_Tech_Area("Applied Political Science", 1, TRUE, FALSE) // 3,000
    call Add_Tech_Area("Robotics", 1, TRUE, FALSE) // 6,000
    call Add_Tech_Area("Medical Treatment", 2, TRUE, FALSE) // 6,000
    call Add_Tech_Area("Minerals Extraction", 3, TRUE, FALSE) // 20,000
    call Add_Tech_Area("Organics Extraction", 2, TRUE, FALSE) // 4,000
    call Add_Tech_Area("Radioatives Extraction", 2, TRUE, FALSE) // 6,000
    // Sub-Total 153,000 (469,000)
    call Add_Tech_Area("Weapon Mounts", 1, TRUE, FALSE) // 1,000
    call Add_Tech_Area("Ship Weapon Mounts", 5, TRUE, FALSE) // 15,000
    call Add_Tech_Area("Plasma Missile Weapons", 1, bool_Race_Uses_Plasma_Missile_Weapons, FALSE) // 4,000
    call Add_Tech_Area("Point-Defense Weapons", 3, TRUE, FALSE) // 6,000
    call Add_Tech_Area("Smaller Weapons", 3, TRUE, FALSE) // 5,000
    // Sub-Total 31,000 (500,000)
    call Add_Tech_Area("Psychic Technology", 4, bool_Race_Uses_Psychic_Tech, FALSE) // 8,000
    call Add_Tech_Area("Psychic Weapons", 6, bool_Race_Uses_Psychic_Weapons, FALSE) // 18,000
    // Sub-Total 26,000 (526,000)
    call Add_Tech_Area("Astrophysics", 2, TRUE, FALSE) // 12,000
    call Add_Tech_Area("Biology", 2, TRUE, FALSE) // 6,000
    call Add_Tech_Area("Chemistry", 3, TRUE, FALSE) // 18,000
    call Add_Tech_Area("Industry", 3, TRUE, FALSE) // 25,000
    call Add_Tech_Area("Physics", 3, TRUE, FALSE) // 18,000
    call Add_Tech_Area("Planetary Engineering", 1, TRUE, FALSE) // 10,000
    // Sub-Total 89,000 (615,000)
    call Add_Tech_Area("Medium Ship Construction", 6, TRUE, FALSE) // 120,000
    call Add_Tech_Area("Large Ship Construction", 3, TRUE, FALSE) // 60,000
    call Add_Tech_Area("Vehicle Systems", 3, TRUE, FALSE) // 15,000
    call Add_Tech_Area("Resupply", 6, TRUE, FALSE) // 15,000
    call Add_Tech_Area("Cargo", 5, TRUE, FALSE) // 9,000
    call Add_Tech_Area("Storage", 6, TRUE, FALSE) // 20,000
    call Add_Tech_Area("Applied Research", 5, TRUE, FALSE) // 54,000
    call Add_Tech_Area("Centralized Computer Systems", 1, TRUE, FALSE) // 6,000
    call Add_Tech_Area("Planet Utilization", 3, TRUE, FALSE) // 12,000
    call Add_Tech_Area("Resource Manipulation", 1, TRUE, FALSE) // 5,000
    call Add_Tech_Area("Minerals Extraction", 5, TRUE, FALSE) // 36,000
    call Add_Tech_Area("Organics Extraction", 3, TRUE, FALSE) // 6,000
    call Add_Tech_Area("Radioactives Extraction", 3, TRUE, FALSE) // 9,000
    // Sub-Total 367,000 (982,000)
    call Add_Tech_Area("Cultural Studies", 1, TRUE, FALSE) // 3,000
    call Add_Tech_Area("Diplomacy", 2, TRUE, FALSE) // 9,000
    call Add_Tech_Area("Environment", 2, TRUE, FALSE) // 6,000
    // Sub-Total 18,000 (1,000,000)
  endif

  // If there are setup points remaining, spend them
  if (Sys_AI_Setup_Get_Research_Points_Remaining(sys_long_Player_ID) > 1000) then
    call AI_Research_Selection()
  endif

  return TRUE
end

//------------------------------------------------------------------------